MacVec 128 128 getinterval astore pop

/macron/breve/dotaccent/ring/cedilla/hungarumlaut/ogonek/caron

/apple/Ograve/Uacute/Ucircumflex/Ugrave/dotlessi/circumflex/tilde

/Edieresis/Egrave/Iacute/Icircumflex/Idieresis/Igrave/Oacute/Ocircumflex

/perthousand/Acircumflex/Ecircumflex/Aacute

/daggerdbl/periodcentered/quotesinglbase/quotedblbase

/ydieresis/Ydieresis/fraction/currency/guilsinglleft/guilsinglright/fi/fl

/endash/emdash/quotedblleft/quotedblright/quoteleft/quoteright/divide/lozenge

/guillemotright/ellipsis/nbspace/Agrave/Atilde/Otilde/OE/oe

/questiondown/exclamdown/logicalnot/radical/florin/approxequal/Delta/guillemotleft

/product/pi/integral/ordfeminine/ordmasculine/Omega/ae/oslash

/infinity/plusminus/lessequal/greaterequal/yen/mu/partialdiff/summation

/registered/copyright/trademark/acute/dieresis/notequal/AE/Oslash

/dagger/degree/cent/sterling/section/bullet/paragraph/germandbls

/ograve/ocircumflex/odieresis/otilde/uacute/ugrave/ucircumflex/udieresis

/ecircumflex/edieresis/iacute/igrave/icircumflex/idieresis/ntilde/oacute

/agrave/acircumflex/adieresis/atilde/aring/ccedilla/eacute/egrave

/Adieresis/Aring/Ccedilla/Eacute/Ntilde/Odieresis/Udieresis/aacute

/twosuperior/brokenbar/minus/multiply/RS/US MacVec 0 32 getinterval astore pop

/onehalf/onequarter/onesuperior/threequarters/threesuperior

/Thorn/thorn/CR/Zcaron/zcaron/DLE/DC1/DC2/DC3/DC4

/NUL/Eth/eth/Lslash/lslash/Scaron/scaron/Yacute/yacute/HT/LF

MacVec 127 /DEL put MacVec 16#27 /quotesingle put MacVec 16#60 /grave put

MacVec 0 /Helvetica findfont /Encoding get 0 128 getinterval putinterval

/MacVec 256 array def

/RF{dup cvn FontDirectory exch known{pop}{RC}ifelse}bind def

{cvn findfont pop}ifelse}bind def

/Encoding MacVec put NewN exch definefont pop}

findfont dup maxlength dict CD dup/FontName NewN put dup

/RC{(|______)anchorsearch{1 index MN cvn/NewN exch def cvn

Len 4 -1 roll putinterval dup 0 4 -1 roll putinterval}bind def

/MN{1 index length/Len exch def dup length Len add string dup

{pop pop}ifelse}forall NF}bind def

/CD{/NF exch def{exch dup/FID ne 1 index/UniqueID ne and{exch NF 3 1 roll put}